home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / CUGUK / UTIL_SRC / C016.ZIP / CALC / HOC.H < prev    next >
Text File  |  1990-01-19  |  494b  |  19 lines
  1. /* Global data structures for hoc 
  2.  *
  3.  * $Author: jkcohen $
  4.  * $Source: /mnt1/h/jkcohen/Source/C/Hoc/RCS/hoc.h,v $
  5.  * $Revision: 1.1 $ ; $Date: 87/03/16 21:18:22 $
  6.  * $State: Stab $
  7. */
  8.  
  9. typedef struct Symbol {    /* symbol table entry */
  10.     char    *name;
  11.     int    type;    /* CON, VAR, BLTIN, BLTIN2, BLTIN0, UNDEF */
  12.     union {
  13.         double    val;        /* if CON or VAR */
  14.         double    (*ptr)();    /* if BLTIN */
  15.     } u;
  16.     struct Symbol    *next;    /* to link to another */
  17. } Symbol;
  18. Symbol    *install(), *lookup();
  19.